1// Insert menu illustration scene
2// Author Friedrich A. Lohmueller, Feb-2013
3#version 3.7;
4global_settings{ assumed_gamma 1.0 }
5
6#default{ finish{ ambient 0.1 diffuse 0.9 }}
7#include "shapes.inc"
8#include "shapes2.inc"
9#include "colors.inc"
10#include "textures.inc"
11#include "glass.inc"
12
13#declare In_Path = "35 - Shapes3/"
14//--------------------------------------------------------------
15// samples for
16// #include "shapes3.inc"
17// -------------------------------------------------------------
18
19
20 //  #declare Typ =20; // for tests
21
22#switch (Typ)  //-----------------------------------------------------------------------------
23#case( 1)  #declare Txt_Path="01 - Segment_of_Torus.txt"  #break
24#case( 3)  #declare Txt_Path="03 - Segment_of_CylinderRing.txt"  #break
25#case( 5)  #declare Txt_Path="05 - Segment_of_Object.txt"  #break
26#case(12)  #declare Txt_Path="12 - Egg.txt"  #break
27#case(14)  #declare Txt_Path="14 - Egg_Shape.txt"  #break
28
29#case(15)  #declare Txt_Path="15 - Facetted_Egg.txt"  #break
30#case(16)  #declare Txt_Path="16 - Facetted_Egg_Shape.txt"  #break
31#case(17)  #declare Txt_Path="17 - Facetted_Sphere.txt"  #break
32#case(18)  #declare Txt_Path="18 - Facetted_Sphere 2.txt"  #break
33#case(19)  #declare Txt_Path="18 - Facetted_Sphere 3.txt"  #break
34#case(20)  #declare Txt_Path="18 - Facetted_Sphere 4.txt"  #break
35#case(21)  #declare Txt_Path="18 - Ring_Sphere_2.txt"  #break
36
37#case(22)  #declare Txt_Path="20 - Column_N.txt"  #break
38#case(23)  #declare Txt_Path="23 - Column_N_AB.txt"  #break
39
40#case(24)  #declare Txt_Path="24 - Pyramid_N_AB.txt"  #break
41#case(25)  #declare Txt_Path="25 - Pyramid_N.txt"  #break
42#case(26)  #declare Txt_Path="26 - Pyramid_N truncated.txt"  #break
43
44#case(30)  #declare Txt_Path="30 - Round_Pyramid_N_in truncated.txt"  #break
45#case(31)  #declare Txt_Path="31 - Round_Pyramid_N_in truncated.txt"  #break
46#case(32)  #declare Txt_Path="32 - Round_Pyramid_N_out truncated.txt"  #break
47#case(33)  #declare Txt_Path="33 - Round_Pyramid_N_out truncated.txt"  #break
48#case(34)  #declare Txt_Path="34 - Round_Pyramid_N_in columnar.txt"  #break
49#case(35)  #declare Txt_Path="35 - Round_Pyramid_N_out.txt"  #break
50#case(36)  #declare Txt_Path="36 - Round_Pyramid_N_in wireframe.txt"  #break
51#case(37)  #declare Txt_Path="37 - Round_Pyramid_N_out wireframe.txt"  #break
52#case(38)  #declare Txt_Path="38 - Round_Pyramid_N_out transparent.txt"  #break
53
54#case(40)  #declare Txt_Path="40 - Round_Cylinder_Tube open.txt"  #break
55#case(42)  #declare Txt_Path="42 - Round_Cylinder_Tube filled.txt"  #break
56#case(45)  #declare Txt_Path="45 - Rounded_Tube open.txt"  #break
57#case(47)  #declare Txt_Path="47 - Rounded_Tube_AB.txt"  #break
58
59#case(55)  #declare Txt_Path="55 - Round_N_Tube_Polygon octagonal.txt"  #break
60#case(56)  #declare Txt_Path="56 - Round_N_Tube_Polygon hexagonal.txt"  #break
61#case(57)  #declare Txt_Path="57 - Round_N_Tube_Polygon transparent.txt"  #break
62
63#case(60)  #declare Txt_Path="60 - Round_Conic_Torus transparent.txt"  #break
64#case(61)  #declare Txt_Path="61 - Round_Conic_Torus.txt"  #break
65#case(65)  #declare Txt_Path="65 - Round_Conic_Prism.txt"  #break
66
67#case(71)  #declare Txt_Path="71 - Half_Hollowed_Rounded_Cylinder1.txt"  #break
68#case(72)  #declare Txt_Path="72 - Half_Hollowed_Rounded_Cylinder2.txt"  #break
69
70#end
71// -------------------------------------------------------------------------------------------
72// --------
73// #include concat(In_Path,Txt_Path)
74// right x*image_width/image_height
75//-----------------------------------------------  macro "Vector(Start,End,Radius)"!
76#macro Vector(P_start,P_end, R_Vector)
77union{
78cylinder{ P_start, P_end - ( vnormalize(P_end - P_start)*9.5*R_Vector), R_Vector  }
79cone    { P_end - ( vnormalize(P_end - P_start)*10*R_Vector), 3*R_Vector, P_end, 0 }
80}// end of union
81#end //-------------------------------------------------------------------------- end of macro
82
83//-----------------------------------------------  macro "Distance_Marker(Start,End,Radius)"!
84#macro Distance_Marker(P_start,P_end, R_Vector)
85union{
86cylinder{ P_start + ( vnormalize(P_end - P_start)*9.5*R_Vector),
87          P_end   - ( vnormalize(P_end - P_start)*9.5*R_Vector), R_Vector  }
88cone    { P_end   - ( vnormalize(P_end - P_start)*10*R_Vector), 3*R_Vector, P_end, 0 }
89cone    { P_start + ( vnormalize(P_end - P_start)*10*R_Vector), 3*R_Vector, P_start, 0 }
90}// end of union
91#end //-------------------------------------------------------------------------- end of macro
92
93//------------------------------ the Axes --------------------------------
94//------------------------------------------------------------------------
95#macro Axis_( AxisLen, Dark_Texture,Light_Texture)
96 union{
97    cylinder { <0,-AxisLen,0>,<0,AxisLen,0>,0.035
98               texture{checker texture{Dark_Texture }
99                               texture{Light_Texture}
100                       translate<0.1,0,0.1>}
101             }
102    cone{<0,AxisLen,0>,0.12 ,<0,AxisLen+0.45,0>,0
103          texture{Dark_Texture}
104         }
105     } // end of union
106#end // of macro "Axis()"
107//------------------------------------------------------------------------
108#macro AxisXYZ( AxisLenX, AxisLenY, AxisLenZ, Tex_Dark, Tex_Light)
109//--------------------- drawing of 3 Axes --------------------------------
110#declare Text_Rotate =<20,-45,0>;
111union{
112#if (AxisLenX != 0)
113 object { Axis_(AxisLenX, Tex_Dark, Tex_Light)   rotate< 0,0,-90>}// x-Axis
114 text   { ttf "arial.ttf",  "x",  0.15,  0  texture{Tex_Dark}
115          rotate Text_Rotate scale 0.6 translate <AxisLenX+0.10,0.3,0.00>}
116#end // of #if
117#if (AxisLenY != 0)
118 object { Axis_(AxisLenY, Tex_Dark, Tex_Light)   rotate< 0,0,  0>}// y-Axis
119 text   { ttf "arial.ttf",  "y",  0.15,  0  texture{Tex_Dark}
120          rotate <Text_Rotate.x,0,0> scale 0.65 translate <-0.55,AxisLenY+0.10,-0.10> rotate <0,Text_Rotate.y,0>}
121#end // of #if
122#if (AxisLenZ != 0)
123 object { Axis_(AxisLenZ, Tex_Dark, Tex_Light)   rotate<90,0,  0>}// z-Axis
124 text   { ttf "arial.ttf",  "z",  0.15,  0  texture{Tex_Dark}
125          rotate Text_Rotate scale 0.75 translate <-0.55,0.2,AxisLenZ+0.10>}
126#end // of #if
127} // end of union
128#end// of macro "AxisXYZ( ... )"
129//------------------------------------------------------------------------
130#declare Texture_A_Dark  = texture {
131                               pigment{ color rgb<1,0.45,0>}
132                               finish { phong 1}
133                             }
134#declare Texture_A_Light = texture {
135                               pigment{ color rgb<1,1,1>}
136                               finish { phong 1}
137                             }
138
139//-------------------------------------------------- end of coordinate axes
140//------------------------------------------------------------------------
141
142// sky -------------------------------------------------------------------
143#declare Sky_01 =
144sphere{<0,0,0>,1     pigment{ gradient <0,1,0>
145                     color_map{ [0   color rgb<0.24,0.34,0.56>*0.6]
146                                [0.5 color rgb<0.24,0.34,0.56>*0.3]
147                                [0.5 color rgb<0.24,0.34,0.56>*0.3]
148                                [1.0 color rgb<0.24,0.34,0.56>*0.6]  }
149                     scale 2 }
150                     finish{ ambient 1 diffuse 0 }
151        scale 10000
152      } // end of sky_sphere
153//------------------------------------------------------------------------
154#declare Sky_02 =
155union{
156sphere{<0,0,0>,1
157               pigment{ //color rgb<1,1,1> } //
158                     gradient <0,1,0>
159                     color_map{ [0   color rgb<0.24,0.34,0.56>*1.0]
160                                [0.5 color rgb<0.24,0.34,0.56>*0.3]
161                                [0.5 color rgb<0.24,0.34,0.56>*0.3]
162                                [1.0 color rgb<0.24,0.34,0.56>*1.0]
163                              }
164                     scale 2 }
165                     finish{ ambient 1 diffuse 0 }
166        scale 50000
167           } // end of  sphere
168
169plane{<0,1,0>,1 hollow
170       texture{ pigment{ bozo turbulence 0.92
171                         color_map { [0.00 rgb <0.24, 0.32, 1.0>*0.7]
172                                     [0.50 rgb <0.24, 0.32, 1.0>*0.7]
173                                     [0.70 rgb <1,1,1>]
174                                     [0.85 rgb <0.25,0.25,0.25>]
175                                     [1.0 rgb <0.5,0.5,0.5>]}
176                        scale<1,1,1.5>*1.25  translate< 0,0,0>
177                       }
178                finish {ambient 1 diffuse 0} }
179       scale 5000}
180} // end union
181//------------------------------------------------------------------------------------
182//------------------------------------------------------------------------------------
183//------------------------------------------------------------------------------------
184// --------
185#if (Typ=1) // 01 - Segment_of_Torus.txt"
186camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0 , 0.25 , 0.0>}
187light_source{<1500,2500,-2500> color White}
188object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
189object{ Sky_01 }
190#include concat(In_Path,Txt_Path) // 01 - Segment_of_Torus.txt"
191#end
192
193// --------
194#if (Typ=3) // 03 - Segment_of_CylinderRing.txt
195camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at<0.0 , 0.25 , 0.0>}
196light_source{<1500,2500,-2500> color White}
197object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
198object{ Sky_01 }
199#include concat(In_Path,Txt_Path) // 03 - Segment_of_CylinderRing.txt
200#end
201
202
203
204
205// --------
206#if (Typ=5) // 05 - Segment_of_Object.txt
207camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0 , 0.25 , 0.0>}
208light_source{<1500,2500,-2500> color White}
209object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
210object{ Sky_01 }
211#include concat(In_Path,Txt_Path) // 05 - Segment_of_Object.txt
212#end
213
214
215// --------
216#if (Typ=12) // 12 - Egg.txt
217camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0, 1.00, 0.0>}
218light_source{<1200,2500,-3000> color White}
219object{ AxisXYZ( 1.35, 4.0, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
220object{ Sky_01 }
221#include concat(In_Path,Txt_Path) // 12 - Egg.txt
222#end
223// --------
224#if (Typ=14) // 14 - Egg_Shape.txt
225camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0, 1.00, 0.0>}
226light_source{<1200,2500,-3000> color White}
227object{ AxisXYZ( 1.35, 4.0, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
228object{ Sky_01 }
229#include concat(In_Path,Txt_Path) // 14 - Egg_Shape.txt
230#end
231// --------
232#if (Typ=15) // 15 - Facetted_Egg.txt
233camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0, 1.00, 0.0>}
234light_source{<1200,2500,-3000> color White}
235object{ AxisXYZ( 1.35, 4.0, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
236object{ Sky_01 }
237#include concat(In_Path,Txt_Path) // 15 - Facetted_Egg.txt
238#end
239// --------
240#if (Typ=16) // 16 - Facetted_Egg_Shape.txt
241camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0 , 0.00 , 0.0>}
242light_source{<1500,2500,-2500> color White}
243object{ AxisXYZ( 2.5, 2.25, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
244object{ Sky_01 }
245#include concat(In_Path,Txt_Path) // 16 - Facetted_Egg_Shape.txt
246#end
247// --------
248#if (Typ=17) // 17 - Facetted_Sphere.txt
249camera{ angle 35 location <3.5 , 2.5 ,-3.0> right x*image_width/image_height look_at <0.0 , 0.15 , 0.0>}
250light_source{<-1200,1500,-2500> color rgb<1,1,1>*0.8}
251light_source{ <3.5 , 2.5 ,-3.0> color rgb<1,1,1>*0.2 shadowless }
252object{ AxisXYZ( 3.0, 2.2, 4.5, Texture_A_Dark, Texture_A_Light) scale 0.5}
253object{ Sky_01 }
254#include concat(In_Path,Txt_Path) // 17 - Facetted_Sphere.txt
255#end
256// --------
257#if (Typ=18) // 18 - Facetted_Sphere.txt
258camera{ angle 38 location  < 2.50, 3.00, -2.70> right x*image_width/image_height look_at <0.0 , 0.10, 0.0>}
259light_source{<-500,500,-2500> color rgb<1,1,1>*0.8}                // sun
260light_source{ <1000,2500,-1000>  color rgb<0.9,0.9,1>*0.2 shadowless}// flash
261object{ AxisXYZ( 3.0, 2.2, 4.5, Texture_A_Dark, Texture_A_Light) scale 0.5}
262object{ Sky_01 }
263object{ Sky_02   }
264#include concat(In_Path,Txt_Path) // 18 - Facetted_Sphere 2.txt
265#end
266// --------
267#if (Typ=19) // 19 - Facetted_Sphere.txt
268camera{ angle 38 location  < 2.50, 3.00, -2.70> right x*image_width/image_height look_at <0.0 , 0.10, 0.0>}
269light_source{<-500,500,-2500> color rgb<1,1,1>*0.8}                // sun
270light_source{ <1000,2500,-1000>  color rgb<0.9,0.9,1>*0.2 shadowless}// flash
271object{ AxisXYZ( 3.0, 2.2, 4.5, Texture_A_Dark, Texture_A_Light) scale 0.5}
272object{ Sky_01 }
273object{ Sky_02   }
274#include concat(In_Path,Txt_Path) // 18 - Facetted_Sphere 3.txt
275#end
276// --------
277#if (Typ=20) // 17 - Facetted_Sphere 3.txt
278camera{ angle 38 location  < 2.50, 3.00, -2.70> right x*image_width/image_height look_at <0.0 , 0.10, 0.0>}
279light_source{<-500,500,-2500> color rgb<1,1,1>*0.8}                // sun
280light_source{ <1000,2500,-1000>  color rgb<0.9,0.9,1>*0.2 shadowless}// flash
281object{ AxisXYZ( 3.0, 2.2, 4.5, Texture_A_Dark, Texture_A_Light) scale 0.5}
282object{ Sky_01 }
283object{ Sky_02   }
284#include concat(In_Path,Txt_Path) // 18 - Facetted_Sphere 4.txt
285#end
286// --------
287// --------
288#if (Typ=21) // 18 - Ring_Sphere.txt
289camera{ angle 35 location<3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0 , 0.15 , 0.0>}
290light_source{<-500,1500,-2500> color rgb<1,1,1>*0.9}
291light_source{ <3.5 , 2.5 ,-3.0> color rgb<1,1,1>*0.1 shadowless }
292object{ AxisXYZ( 3.35, 2.6, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
293object{ Sky_01 }
294#include concat(In_Path,Txt_Path) // 18 - Ring_Sphere.txt
295#end
296// --------
297#if (Typ=22) // 20 - Column_N.txt
298camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0, 0.25, 0.0>}
299light_source{< 600,2500,-3000> color White}
300object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
301object{ Sky_01 }
302#include concat(In_Path,Txt_Path) // 20 - Column_N.txt
303#end
304// --------
305#if (Typ=23) // 23 - Column_N_AB.txt
306camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0, 0.25, 0.0>}
307light_source{<-1500,2500,-2500> color White*0.9}
308light_source{<3.5 , 3.5 ,-3.0> color White*0.1 shadowless}
309object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
310object{ Sky_01 }
311#include concat(In_Path,Txt_Path) // 23 - Column_N_AB.txt
312#end
313// --------
314#if (Typ=24) // 24 - Pyramid_N_AB.txt
315camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0, 0.25, 0.0>}
316light_source{<500,2500,-2500> color White}
317object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
318object{ Sky_01 }
319// ------------------------------------------------------------------
320sphere{<0,0,0>,0.05 texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<0,1,-1>}
321text{ttf "arial.ttf","A", 0.025, 0.0 scale 0.25  rotate<20,-45,0>
322                    texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<0+1,1+0.4,-1-1>}
323sphere{<0,0,0>,0.04 texture{ pigment{rgb<1,0.18 ,0>} finish{phong 1}} translate<1.5,1.5,-0.5>}
324text{ttf "arial.ttf","B", 0.025, 0.0 scale 0.3 rotate<20,-45,2>
325                    texture{ pigment{rgb<1,0.3,0>} finish{phong 1}} translate<1.5,1.5+0.3,-0.5>}
326// ------------------------------------------------------------------
327#include concat(In_Path,Txt_Path) // 24 - Pyramid_N_AB.txt
328#end
329// --------
330#if (Typ=25) // 25 - Pyramid_N.txt
331camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0, 0.25, 0.0>}
332light_source{<-1500,2500,-2500> color White*0.9}
333light_source{<3.5 , 3.5 ,-3.0> color White*0.1 shadowless}
334object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
335object{ Sky_01 }
336#include concat(In_Path,Txt_Path) // 25 - Pyramid_N.txt //0
337#end
338// --------
339#if (Typ=26) // 26 - Pyramid_N truncated.txt
340camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0, 0.25, 0.0>}
341light_source{<-1500,2500,-2500> color White*0.9}
342light_source{<3.5 , 3.5 ,-3.0> color White*0.1 shadowless}
343object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
344object{ Sky_01 }
345#include concat(In_Path,Txt_Path) // 26 - Pyramid_N truncated.txt    //1
346#end
347// --------
348#if (Typ=30) // 30 - Round_Pyramid_N_in truncated.txt
349camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0 , 0.25 , 0.0>}
350light_source{<-1500,2500,-2500> color White*0.9}
351light_source{<3.5 , 3.5 ,-3.0> color White*0.1 shadowless}
352object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
353object{ Sky_01 }
354#include concat(In_Path,Txt_Path) // 30 - Round_Pyramid_N_in truncated.txt //_15
355#end
356// --------
357#if (Typ=31) // 31 - Round_Pyramid_N_in truncated.txt
358camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0 , 0.25 , 0.0>}
359light_source{<1200,2500,-3000> color White}
360object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
361object{ Sky_01 }
362// ------------------------------------------------------------------
363object{ Vector( <0,0,0>,<0.70,0,0>, 0.03) rotate<0,0,0> translate<0,0.05,0> pigment{ color rgb<0.4,0.7,0.0> } }
364object{ Vector( <0,0,0>,<0.55,0,0>, 0.03) rotate<0,0,0> translate<0,0.82,0>  pigment{ color rgb<1,0.8,0.0> } }
365// ------------------------------------------------------------------
366#include concat(In_Path,Txt_Path) // 31 - Round_Pyramid_N_in truncated.txt // 06
367#end
368// --------
369#if (Typ=32) // 32 - Round_Pyramid_N_out truncated.txt
370camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0, 0.25, 0.0>}
371light_source{<1200,2500,-3000> color White}
372object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
373object{ Sky_01 }
374// ------------------------------------------------------------------
375object{ Vector( <0,0,0>,<1.20,0,0>, 0.03) translate<0,0.08,0> pigment{ color rgb<0.4,0.7,0.0> } }
376object{ Vector( <0,0,0>,<0.95,0,0>, 0.03) translate<0,0.8,0> pigment{ color rgb<1,0.8,0.0> } }
377// ------------------------------------------------------------------
378#include concat(In_Path,Txt_Path) // 32 - Round_Pyramid_N_out truncated.txt //out 06
379#end
380// --------
381#if (Typ=33) // 33 - Round_Pyramid_N_out truncated.txt
382camera{ angle 35 location <3.5, 3.5,-3.0> right x*image_width/image_height look_at <0.0, 0.25, 0.0>}
383light_source{<500,2500,-3000> color White}
384object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
385object{ Sky_01 }
386object{ Vector( <0,0,0>,<0.70,0,0>, 0.03) rotate<0,0,-52> rotate<20,0,0> translate<1.0,1.1,0> pigment{ color rgb<0.4,0.7,0.0>}}
387sphere { <0,0,0>, 0.04
388         texture{ pigment{ color rgb< 0.4,0.7, 0.0>}
389                  finish { phong 1 }
390                }
391         translate  <1,1.1,0>
392       }  // end of sphere
393// ------------------------------------------------------------------
394#include concat(In_Path,Txt_Path) //  33 - Round_Pyramid_N_out truncated.txt // out_08
395#end
396// --------
397#if (Typ=34) // 34 - Round_Pyramid_N_in columnar.txt
398camera{ angle 40 location<3.2 , 2 ,-3.00> right x*image_width/image_height look_at <0.0 , 0.50 , 0.0>}
399light_source{<- 500,2500,-2500> color rgb<1,1,1>*0.8}
400light_source{ <3.5 , 2.5 ,-3.0> color rgb<1,1,1>*0.2 shadowless }
401object{ AxisXYZ( 2.85, 2.8, 6.0, Texture_A_Dark, Texture_A_Light) scale 0.5}
402object{ Sky_01 }
403//-------------------------------------------------------------------
404object{ Vector( <0,0,0>,<1.20,0,0>, 0.03) translate<0,0.72,0> pigment{ color rgb< 0.4,0.7,0.0>}}
405#include concat(In_Path,Txt_Path) // 34 - Round_Pyramid_N_in columnar.txt // in _12
406//-------------------------------------------------------------------
407object{ Round_Pyramid_N_in( // defined by circumcircle radii
408                             8 , // number of side faces
409                             <0,00,0>, 1.21, <0,0.70,0>, 1.21 , // A, radius A, B, radius B,
410                             0.015, // wire radius or border radius
411                             0,  //  1 = Filled
412                             0   // 0 = union, 1 = merge for transparent materials
413                       )//-----------------------------------------------------------------
414        texture{ pigment{ color rgb< 1,0.7,0> }
415                 finish { phong 1}
416               } // end of texture
417       } // end of object ------------------------------------------------------------------
418//-------------------------------------------------------------------
419#end
420// --------
421#if (Typ=35) // 35 - Round_Pyramid_N_out_12.txt
422camera{ angle 40 location<3.2 , 2 ,-3.00> right x*image_width/image_height look_at <0.0 , 0.50 , 0.0>}
423light_source{<-2500,2500,-2500> color rgb<1,1,1>*1}
424object{ AxisXYZ( 2.85, 2.8, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
425object{ Sky_01 }
426#include concat(In_Path,Txt_Path) // 35 - Round_Pyramid_N_out_12.txt  //   out_12
427#end
428// --------
429#if (Typ=36) // 36 - Round_Pyramid_N_in wireframe.txt
430camera{ angle 40 location <3.2 , 2 ,-3.00> right x*image_width/image_height look_at <0.0, 0.50, 0.0>}
431light_source{< 500,2500,-2500> color rgb<1,1,1>*0.9}
432light_source{ <3.5 , 2.5 ,-3.0> color rgb<1,1,1>*0.1 shadowless }
433object{ AxisXYZ( 2.85, 2.8, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
434object{ Sky_01 }
435// ------------------------------------------------------------------
436object{ Vector( <0,0,0>,<1.02,0,0>, 0.02) translate<0,0.11,0> pigment{ color rgb<0.7,0,0.0> } }
437//------------------------------------------------------------------------------------
438#include concat(In_Path,Txt_Path) //  36 - Round_Pyramid_N_in wireframe.txt  // in_11
439#end
440// --------
441#if (Typ=37) // 37 - Round_Pyramid_N_out wireframe.txt
442camera{ angle 40 location <3.2 , 2 ,-3.00> right x*image_width/image_height look_at <0.0, 0.50, 0.0>}
443light_source{< 500,2500,-2500> color rgb<1,1,1>*0.9}
444light_source{ <3.5 , 2.5 ,-3.0> color rgb<1,1,1>*0.1 shadowless }
445object{ AxisXYZ( 2.85, 2.8, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
446object{ Sky_01 }
447// ------------------------------------------------------------------
448object{ Vector( <0,0,0>,<1.30,0,0>, 0.02)  translate<0,0.11,0> pigment{ color rgb< 0.7,1,0.0> } }
449//-------------------------------------------------------------------
450#include concat(In_Path,Txt_Path) // 37 - Round_Pyramid_N_out wireframe.txt // out _11.
451#end
452// --------
453
454
455#if (Typ=38) // 38 - Round_Pyramid_N_out transparent.txt
456camera{ angle 40 location<3.2 , 2 ,-3.00> right x*image_width/image_height look_at<0.0, 0.50, 0.0>}
457light_source{< 00,2500,-2500> color rgb<1,1,1>*0.8}
458light_source{ <3.5 , 2.5 ,-3.0> color rgb<1,1,1>*0.2 shadowless }
459object{ AxisXYZ( 2.85, 2.8, 6.0, Texture_A_Dark, Texture_A_Light) scale 0.5}
460object{ Sky_01 }
461#include concat(In_Path,Txt_Path) // 38 - Round_Pyramid_N_out transparent.txt    //out_14
462#end
463// --------
464#if (Typ=40) //  40 - Round_Cylinder_Tube open.txt
465camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0 , 0.25 , 0.0>}
466light_source{<  0,2500,-2500> color White}
467object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
468object{ Sky_01 }
469// ------------------------------------------------------------------
470object{ Vector( <0,0,0>,<0,-0.95,0>, 0.03) rotate<50,0,25> translate<1.0,0.9,-0.3> pigment{color rgb<1,0.48,0>}}
471sphere{<0,0,0>,0.05 texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<-1,0.2,-0.2>}
472text{ttf "arial.ttf","A", 0.035, 0.0 scale 0.25  rotate<20,-45,0>
473                    texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<-1.4,0.6,-0.85>}
474sphere{<0,0,0>,0.05 texture{ pigment{rgb<1,0.48 ,0>} finish{phong 1}} translate<1.0,0.9,-0.3>}
475text{ttf "arial.ttf","B", 0.025, 0.0 scale 0.25 rotate<20,-45,2>
476                    texture{ pigment{rgb<1,0.48,0>} finish{phong 1}} translate<1.45,0.9+0.4,-0.5>}
477//-------------------------------------------------------------------
478#include concat(In_Path,Txt_Path) // 40 - Round_Cylinder_Tube open.txt  // 1
479#end
480// --------
481#if (Typ=42) // 42 - Round_Cylinder_Tube filled.txt
482camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0,0.25,0.0>}
483light_source{<  0,2500,-2500> color White}
484object{ AxisXYZ( 3.35, 2.8, 5.5, Texture_A_Dark, Texture_A_Light) scale 0.5}
485object{ Sky_01 }
486// ------------------------------------------------------------------
487object{ Vector( <0,0,0>,<0,-0.85,0>, 0.03) rotate<50,0,25> translate<1.0,0.9,-0.3> pigment{color rgb<1,0.48,0>}}
488sphere{<0,0,0>,0.05 texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<-1,-0.2,-0.2>}
489text{ttf "arial.ttf","A", 0.035, 0.0 scale 0.25  rotate<20,-45,0>
490                    texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<-1.4,0.6,-0.85>}
491sphere{<0,0,0>,0.05 texture{ pigment{rgb<1,0.18 ,0>} finish{phong 1}} translate<1.0,0.9,-0.3>}
492text{ttf "arial.ttf","B", 0.025, 0.0 scale 0.25 rotate<20,-45,2>
493                    texture{ pigment{rgb<1,0.3,0>} finish{phong 1}} translate<1.4,0.9+0.4,-0.5>}
494//------------------------------------------------------------------------------
495#include concat(In_Path,Txt_Path) // 42 - Round_Cylinder_Tube filled.txt  // _3
496#end
497// --------
498#if (Typ=45) // 45 - Rounded_Tube open.txt
499camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0,0.25,0.0>}
500light_source{<  00,2500,-2500> color White}
501object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
502object{ Sky_01 }
503// ------------------------------------------------------------------
504object{ Vector( <0,0,0>,<0.80,0,0>, 0.03) translate<0,0.70,0> pigment{color rgb<0.7,1,0>}}
505sphere{<0,0,0>,0.05 texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<0,0.7,0>}
506object{ Vector( <0,0,0>,<1.50,0,0>, 0.03) rotate<0,-25,0> translate<0,0.70,0.05> pigment{color rgb<1,0.48,0>}}
507object{ Distance_Marker( <0,0,0>,<0,0.70,0>, 0.02 ) translate<1.52,0,0> rotate<0, 0,0> pigment{color rgb<1,0.28,0>}}
508//-------------------------------------------------------------------
509#include concat(In_Path,Txt_Path) // 45 - Rounded_Tube open.txt                          // _1
510#end
511// --------
512#if (Typ=47) // 47 - Rounded_Tube_AB.txt
513camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0,0.25,0.0>}
514light_source{<  00,2500,-2500> color White}
515object{ AxisXYZ( 3.35, 2.75, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
516object{ Sky_01 }
517// ------------------------------------------------------------------
518object{ Vector( <0,0,0>,<0,-0.50,0>, 0.025) rotate<90,0,0> translate<1.0,0.9,-0.3> pigment{color rgb<0.7,1,0>}}
519sphere{<0,0,0>,0.05 texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<0,0.7,0>}
520object{ Vector( <0,0,0>,<0,-0.95,0>, 0.03) rotate<50,0,25> translate<1.0,0.9,-0.3> pigment{color rgb<1,0.48,0>}}
521sphere{<0,0,0>,0.05 texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<-1,0.2,-0.2>}
522text{ttf "arial.ttf","A", 0.035, 0.0 scale 0.25  rotate<20,-45,0>
523                    texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<-1.4,0.6,-0.85>}
524sphere{<0,0,0>,0.05 texture{ pigment{rgb<1,0.18 ,0>} finish{phong 1}} translate<1.0,0.9,-0.3>}
525text{ttf "arial.ttf","B", 0.025, 0.0 scale 0.25 rotate<20,-45,2>
526                    texture{ pigment{rgb<1,0.3,0>} finish{phong 1}} translate<1.4,0.9+0.4,-0.5>}
527//----------------------------------------------------------------------------
528#include concat(In_Path,Txt_Path) // 47 - Rounded_Tube_AB.txt                            // _1
529#end
530// --------
531#if (Typ=55) // 55 - Round_N_Tube_Polygon octagonal.txt
532camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0,0.25,0.0>}
533light_source{<1500,2500,-2500> color White}
534object{ AxisXYZ( 3.35, 2.70, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
535object{ Sky_01 }
536#include concat(In_Path,Txt_Path) //  55 - Round_N_Tube_Polygon octagonal.txt         // _3
537#end
538// --------
539#if (Typ=56) // 56 - Round_N_Tube_Polygon hexagonal.jpg
540camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0,0.25,0.0>}
541light_source{<1500,2500,-2500> color White}
542object{ AxisXYZ( 3.35, 2.70, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
543object{ Sky_01 }
544#include concat(In_Path,Txt_Path)//  56 - Round_N_Tube_Polygon hexagonal.jpg      // _1
545#end
546// --------
547#if (Typ=57) // 57 - Round_N_Tube_Polygon transparent.txt
548camera{ angle 35 location <3.5 , 3.5 ,-3.0> right x*image_width/image_height look_at <0.0,0.25,0.0>}
549light_source{<1500,2500,-2500> color White}
550object{ AxisXYZ( 3.35, 2.70, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
551object{ Sky_01 }
552#include concat(In_Path,Txt_Path) // 57 - Round_N_Tube_Polygon transparent.txt    // _2
553#end
554// --------
555#if (Typ=60) // 60 - Round_Conic_Torus transparent.txt
556camera{ angle 45 location<0.0 , 0.25 ,-4.0>right x*image_width/image_height look_at <0.0,0.25,0.0>}
557light_source{< 0,2500,-2500> color White}
558object{ AxisXYZ( 2.25, 2.4 , 0, Texture_A_Dark, Texture_A_Light) scale 0.5}
559object{ Sky_01 }
560// ------------------------------------------------------------------
561object{ Vector( <0,0,0>,<0.50, 0,0>, 0.025) rotate< 0,0,20> translate<0.0,0.8,-0.13> pigment{color rgb<0.7,1,0>}}
562object{ Vector( <0,0,0>,<0.80,0,0>, 0.025) rotate< 0,0,20> translate<0,0,-0.13> pigment{color rgb<0.7,1,0>}}
563object{ Distance_Marker( <0,0,0>,<0,0.8,0>, 0.03 ) translate<0,0,-0.13> rotate<0, 0,0> pigment{color rgb<0.2, 1, 0>}}
564sphere{<0,0,0>,0.05 texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<0,0,0>}
565sphere{<0,0,0>,0.05 texture{ pigment{rgb<1,0.18 ,0>} finish{phong 1}} translate<0.0,0.80,-0.12>}
566#include concat(In_Path,Txt_Path) // 60 - Round_Conic_Torus transparent.txt               //_2
567#end
568// --------
569#if (Typ=61) // 61 - Round_Conic_Torus.txt
570camera{ angle 41 location<3.5 , 2.5 ,-3.0> right x*image_width/image_height look_at<0.0, 0.80, 0.0>}
571light_source{< 0,2500,-2500> color White}
572object{ AxisXYZ( 2.25, 3.8, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
573object{ Sky_01 }
574   // ------------------------------------------------------------------
575object{ Vector( <0,0,0>,<0.80, 0,0>, 0.025) rotate<90,0,0> translate<0.0,1,-0.13> pigment{color rgb<0.7,1,0>}}
576object{ Vector( <0,0,0>,<0.50,0,0>, 0.025) rotate< 0,0,-30> translate<0,0,-0.13> pigment{color rgb<0.7,1,0>}}
577object{ Distance_Marker( <0,0,0>,<0,1,0>, 0.02 ) translate<0,0,-0.13> rotate<0, 0,0> pigment{color rgb<0.2, 1, 0>}}
578sphere{<0,0,0>,0.05 texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<0,0,0>}
579sphere{<0,0,0>,0.05 texture{ pigment{rgb<1,0.18 ,0>} finish{phong 1}} translate<0.0,1.00,-0.12>}
580#include concat(In_Path,Txt_Path) // 61 - Round_Conic_Torus.txt               //_1
581#end
582// --------
583#if (Typ=65) // 65 - Round_Conic_Prism.txt
584camera{ angle 41 location<3.5, 2.5,-3.0> right x*image_width/image_height look_at  <0.0,0.80,0.0>}
585light_source{< 0,2500,-2500> color White}
586object{ AxisXYZ( 2.25, 3.8, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
587object{ Sky_01 }
588// ------------------------------------------------------------------
589object{ Vector( <0,0,0>,<0.90, 0,0>, 0.025) rotate<0,0,-20> translate<0.0,0.95,-0.83> pigment{color rgb<0.5,1,0>}}
590object{ Vector( <0,0,0>,<0.40,0,0>, 0.025) rotate< 0,0,-20> translate<0,0,-0.83> pigment{color rgb<0.5,1,0>}}
591object{ Distance_Marker( <0,0,0>,<0,0.95,0>, 0.02 ) translate<0,0,-0.83> rotate<0, 0,0> pigment{color rgb<0.2, 1, 0>}}
592sphere{<0,0,0>,0.05 texture{ pigment{rgb<0.6,1,0>} finish{phong 1}} translate<0,0,-0.83>}
593sphere{<0,0,0>,0.05 texture{ pigment{rgb<1,0.18 ,0>} finish{phong 1}} translate<0.0,1.00,-0.83>}
594//----------------------------------------------------------------------------
595#include concat(In_Path,Txt_Path) // 65 - Round_Conic_Prism.txt
596#end
597// --------
598#if (Typ=71) // 71 - Half_Hollowed_Rounded_Cylinder1.txt
599camera{ angle 41 location<3.5, 2.5,-3.0> right x*image_width/image_height look_at <0.0,0.80,0.0>}
600light_source{< 0,2500,-2500> color White}
601object{ AxisXYZ( 2.55, 3.8, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
602object{ Sky_01 }
603#include concat(In_Path,Txt_Path) // 71 - Half_Hollowed_Rounded_Cylinder1.txt
604#end
605// --------
606
607
608#if (Typ=72) // 72 - Half_Hollowed_Rounded_Cylinder2.txt
609camera{ angle 41 location<3.5, 2.5,-3.0> right x*image_width/image_height look_at <0.0,0.80,0.0>}
610light_source{< 0,2500,-2500> color White}
611object{ AxisXYZ( 2.55, 3.8, 5, Texture_A_Dark, Texture_A_Light) scale 0.5}
612object{ Sky_01 }
613#include concat(In_Path,Txt_Path) // 72 - Half_Hollowed_Rounded_Cylinder2.txt
614#end
615// --------
616
617// end of file
618
619
620
621
622
623
624
625
626